home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / comm / cnet / cnet_toolkit.lha / Guidelines4_ASC < prev    next >
Text File  |  1997-04-05  |  900b  |  15 lines
  1. /**/;options results;tr=transmit;gu=getuser;se=sendstring
  2. gu 1212088;sub=result;gu 1412312;a=import(offset(null(),result+sub*696),696)
  3. b=left(a,60);parse var b base"00"x;hand=c2d(substr(a,375,1))
  4. priv=c2d(substr(a,383,1));anon=c2d(substr(a,377,1))
  5. iday=c2d(substr(a,373,2),2);ansi=c2d(substr(a,382,1))
  6. sigs=c2d(substr(a,390,1));o=substr(a,561,60);parse var o orig"00"x;tr "f1"
  7. tr center("cbGuidelines for cd"base,84)"n1c7"copies("-",78)
  8. se "c6   Handles Allowed: "left(word("caYes c9No",(hand=5)+1),8)
  9. se "c6    ANSI/MCI Allowed: "left(word("c9No caYes",ansi+1),8)
  10. tr "c6Signatures Allowed: "word("c9No caYes",sigs+1)
  11. se "c6  Private Messages: "left(word("c9No caYes cbForce",priv+1),8)
  12. se "c6  Anonymous Messages: "left(word("c9No caYes cbForce",anon+1),8)
  13. tr "c6   Inactivity Days: cd"iday
  14. if orig>"" then tr "n1c6 "center("Origin: ca"orig,79)"n1c7"copies("-",78)"q1"
  15.